home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln0385.arc / DEBUG5.LTG < prev    next >
Text File  |  1986-02-27  |  384b  |  19 lines
  1.  
  2. debug.art Listing 5.
  3.  
  4.  
  5.  
  6.   #define ASSERT( Predicate ) \
  7.      DEBUGIN \
  8.      ( \
  9.        if ( ! (Predicate) ) \
  10.        { \
  11.          StdMsg \
  12.          ( stderr \
  13.          , "False assertion: (%s).\n" \
  14.          , "Predicate" \
  15.          ); \
  16.          ABEND(1); \
  17.        } \
  18.      ) /* DEBUGIN */
  19.